Giả sử mảng a gồm các phần tử a[1]=1, a[2]=2, a[3]=3, a[4]=4, a[5]=5.

Cho biết kết quả sau khi thực hiện đoạn chương trình sau:

S:=0;

FOR i:=1 to 5 DO

IF a[i] mod 2 = 0 THEN S:=S+a[i];

writeln(‘S = ’,S);

A. 6

B. S = 6

C. 9

D. S = 9

cho biết số vòng lặp và giá trị của biến s sau khi thực hiện đoạn chương trình: a) S:=0; 

For i:=2 to 8 do S :=S+i 

b) S:=0; n:=1;

For i:=1 to 6 do

    Begin

          S:=S+n;

           n:=n+i;

   end;

c) S:=2;

For i:=1 to 10 do

     If(i mod 2)=0 then S:=S+i;

d) S:=0; i:= 1,5;

While S<7 do S:=S+i;

e) S:=0; i:=1;

While i<9 do

             Begin

                   S:=S+i;

                    i:=i+2;

                End;

f)   S:=2;  i:=1;

While i<= 10 do

Begin

If (i mod 2) then S:=S+i;

       i:=i+1;

End;

A[i] :=21; A[2]:= 5; A[3]:=18; A[4]:=19;

S:=0;

For i:=1 to 4 do

If A[i] mod 3 = 0 then

S:=S+A[i];

Write(s);

Cho biết kết quả in ra là bao nhiêu sau khi thực hiện đoạn chương trình bên?

A.0                 B.27                     C.39                        D.63

Giúp mình với. Mình cần gấp. Cảm ơn